﻿Imports LRS.BLL
Imports System.Collections.Generic
Imports LRS.DTO

Public Class ViewOrder
    Public Sub DisplayOrderInfo(ByVal order As eSalesOrder)
        lblDateOfBill.Text = order.DateOfBill.ToString("dd/MM/yyyy")
        lblDateOfReturn.Text = order.DateOfReturn.ToString("dd/MM/yyyy")
        lblGetEmployee.Text = bEmployee.GetEmployeeByID(order.EmployeeID).EmployeeNumber
        lblGiveEmployee.Text = LRSInfo.Username
        lblTotalAmount.Text = order.TotalAmount.ToString("#,#")

        Dim listOrderDetail As List(Of eSalesOrderDetail)
        listOrderDetail = bSalesOrderDetail.GetSalesOrderDetailByOrderID(order.SalesOrderID)


    End Sub
End Class